home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
gfx
/
fract
/
fu1_61.lha
/
Formulas
/
MandelStar.Form
< prev
next >
Wrap
Text File
|
1994-12-17
|
302b
|
35 lines
MandelStar
{
{
x1=-2.5
x2= 2.5
y1=-2.0
y2= 2.0
par1.r=0.3
par1.i=0.0
bailout=4.0
}
{
c=pixel
z=pixel
}
{
z=z*z
z=z-c
t=real(z)
t=t*t
s=imag(z)
s=s*s
r=s+t
r=pow(r,par1)
r=abs(r)
}
{
r>bailout
}
{
PAR1-STAR(VATION) FACTOR
TRY ALSO NEGATIVE VALUES
}
}